''========================================================
'' Autor: 		Luis Antonio Lara Capetillo
'' Fecha Creación: 	22/11/2012
'' Descripcion: 	Clase Componente ctlFormatoUnicoCredenciales
''========================================================

Public Class ctlFormatoUnicoCredenciales
  Inherits System.Web.UI.UserControl
  
#Region "Propiedades"
  ''' <summary>
  ''' Obtiene o estable el valor Cantidad_Entregada del componente infCantidad_Entregada
  ''' </summary>
  ''' <value>valor tipo String</value>
  ''' <returns>valor tipo String</returns>
  ''' <remarks></remarks>
  Public Property Cantidad_Entregada() As String
    Get
      Return Me.infCantidad_Entregada.Text
    End Get
    Set(value As String)
      Me.infCantidad_Entregada.Text = value
    End Set
  End Property

  ''' <summary>
  ''' Obtiene o establece el valor Fecha_Entrega del TextBox txtFecha_Entrega
  ''' </summary>
  ''' <value>valor tipo String</value>
  ''' <returns>valor tipo String</returns>
  ''' <remarks></remarks>
  Public Property Fecha_Entrega() As String
    Get
      Return Me.txtFecha_Entrega.Text
    End Get
    Set(value As String)
      Me.txtFecha_Entrega.Text = value
    End Set
  End Property

  ''' <summary>
  ''' Obtiene o estable el valor Nombre_Acuse_Recibo del TextBox txtNombre_Acuse_Recibo
  ''' </summary>
  ''' <value>valor tipo String</value>
  ''' <returns>valor tipo String</returns>
  ''' <remarks></remarks>
  Public Property Nombre_Acuse_Recibo() As String
    Get
      Return Me.txtNombre_Acuse_Recibo.Text
    End Get
    Set(value As String)
      Me.txtNombre_Acuse_Recibo.Text = value
    End Set
  End Property

  ''' <summary>
  ''' Obtiene o estable el valor IdCredencial_Acuse_Recibo del TextBox txtIdCredencial_Acuse_Recibo
  ''' </summary>
  ''' <value>valor tipo String</value>
  ''' <returns>valor tipo String</returns>
  ''' <remarks></remarks>
  Public Property IdCredencial_Acuse_Recibo() As String
    Get
      Return Me.txtIdCredencial_Acuse_Recibo.Text
    End Get
    Set(value As String)
      Me.txtIdCredencial_Acuse_Recibo.Text = value
    End Set
  End Property

  ''' <summary>
  ''' Habilita o Desabilita el Control para Edicion
  ''' </summary>
  ''' <value>True o False</value>
  ''' <remarks></remarks>
  Public WriteOnly Property Enabled() As Boolean
    Set(value As Boolean)
	  infCantidad_Entregada.Enabled=value
      txtFecha_Entrega.Enabled=value
      txtNombre_Acuse_Recibo.Enabled=value
      txtIdCredencial_Acuse_Recibo.Enabled=value
      
    End Set
  End Property

  ''' <summary>
  ''' Habilita o Desabilita el Control para solo lectura
  ''' </summary>
  ''' <value>True o False</value>
  ''' <remarks>ReadOnly</remarks>
  Public WriteOnly Property Lectura() As Boolean
    Set(value As Boolean)
	  infCantidad_Entregada.ReadOnly=value
      txtFecha_Entrega.ReadOnly=value
      txtNombre_Acuse_Recibo.ReadOnly=value
      txtIdCredencial_Acuse_Recibo.ReadOnly=value
      
    End Set
  End Property


#End Region
#Region "Eventos"


#End Region
#Region "Metodos"
  ''' <summary>
  ''' Metodo para asignar los datos al componente ctlTurismo
  ''' </summary>
  ''' <param name="tablaDatos">DataTable donde se obtienen los datos</param>
  ''' <remarks></remarks>
  Public Sub AsignarDatos(ByVal tablaDatos As DataTable)
    Me.txtFecha_Entrega.Text= tablaDatos.Rows(0)("Fecha_Entrega").ToString
    Me.txtNombre_Acuse_Recibo.Text= tablaDatos.Rows(0)("Nombre_Acuse_Recibo").ToString
    Me.txtIdCredencial_Acuse_Recibo.Text= tablaDatos.Rows(0)("IdCredencial_Acuse_Recibo").ToString
    
  End Sub  

#End Region
End Class
